home *** CD-ROM | disk | FTP | other *** search
/ Freaks Macintosh Archive / Freaks Macintosh Archive.bin / Freaks Macintosh Archives / Cracking / Password Removal / DeprotectHypercard.sit / DeprotectHypercard / card_2978.txt < prev    next >
Text File  |  1993-06-27  |  2KB  |  77 lines
  1. -- card: 2978 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2750
  5. -- name: 
  6.  
  7.  
  8. -- part 4 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=206 top=187 right=210 bottom=231
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1013 / 1013
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Next
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to next card
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 5 (button)
  28. -- low flags: 00
  29. -- high flags: A003
  30. -- rect: left=196 top=248 right=277 bottom=330
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: Deprotect Stack
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   put filename("STAK") into fname
  42.   if fname is empty then exit mouseUp
  43.   deprotect fname
  44.   if the result is empty
  45.   then answer "Deprotect Successful" with "OK"
  46. else if the result is -49
  47. then answer "Sorry, that file is busy."
  48. else if the result is -44
  49. then answer "Sorry, the disk is locked."
  50. else answer "Failed: unexpected file system error: " & the result with "OK"
  51. end mouseUp
  52.  
  53.  
  54.  
  55. -- part 6 (field)
  56. -- low flags: 01
  57. -- high flags: 0000
  58. -- rect: left=47 top=49 right=76 bottom=466
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 1
  62. -- font id: 2
  63. -- text size: 20
  64. -- style flags: 256
  65. -- line height: 26
  66. -- part name: 
  67.  
  68.  
  69. -- part contents for background part 9
  70. ----- text -----
  71. The button below will prompt for a stack, then (if possible) remove any password for that stack and set the maximum access level back to Scripting.
  72.  
  73. This button is provided in the interests of those who somehow forget the password assigned to a stack.  Please use it responsibly.
  74.  
  75. -- part contents for card part 6
  76. ----- text -----
  77. Deprotect Stack